home *** CD-ROM | disk | FTP | other *** search
/ Amiga News 96 / Amiga News 96.iso / amig_ad_os / avm / prog / source / dialnumber.avmsrc < prev    next >
Text File  |  1977-12-31  |  4KB  |  231 lines
  1. startrecord=true
  2. label=
  3. nodetype=7
  4. filename=avm:rexx/stdhead.avm
  5. nextactiontype=3
  6. nextactionaction=
  7. endrecord=true
  8. startrecord=true
  9. label=
  10. nodetype=8
  11. line1=parse upper arg servername mailbox magiccookie sendType .
  12. line2=
  13. line3=
  14. line4=
  15. line5=
  16. line6=
  17. line7=
  18. line8=
  19. line9=
  20. line10=
  21. nextactiontype=3
  22. nextactionaction=
  23. endrecord=true
  24. startrecord=true
  25. label=
  26. nodetype=8
  27. line1=call loadLogEntry(mailbox, magiccookie)
  28. line2=
  29. line3=
  30. line4=
  31. line5=
  32. line6=
  33. line7=
  34. line8=
  35. line9=
  36. line10=
  37. nextactiontype=3
  38. nextactionaction=
  39. endrecord=true
  40. startrecord=true
  41. label=
  42. nodetype=8
  43. line1=if log.returnNumber = '' then do
  44. line2=  log.returnStatus = 'No Tel#'
  45. line3=  log.returnRetry = 0
  46. line4=  signal sendVoiceDone
  47. line5=end
  48. line6=
  49. line7=
  50. line8=
  51. line9=
  52. line10=
  53. nextactiontype=3
  54. nextactionaction=
  55. endrecord=true
  56. startrecord=true
  57. label=
  58. nodetype=8
  59. line1=numberToDial = log.returnNumber
  60. line2=
  61. line3=
  62. line4=
  63. line5=
  64. line6=
  65. line7=
  66. line8=
  67. line9=
  68. line10=
  69. nextactiontype=3
  70. nextactionaction=
  71. endrecord=true
  72. startrecord=true
  73. label=
  74. nodetype=14
  75. comment=Dial up to three times
  76. nextactiontype=3
  77. nextactionaction=
  78. endrecord=true
  79. startrecord=true
  80. label=dialNumber
  81. nodetype=8
  82. line1=numTries = 3
  83. line2=
  84. line3=
  85. line4=
  86. line5=
  87. line6=
  88. line7=
  89. line8=
  90. line9=
  91. line10=
  92. nextactiontype=3
  93. nextactionaction=
  94. endrecord=true
  95. startrecord=true
  96. label=sendVoiceRedial
  97. nodetype=15
  98. number=log.returnnumber
  99. busyactiontype=0
  100. busyactionaction=sendVoiceAgain
  101. timedoutactiontype=0
  102. timedoutactionaction=sendVoiceAgain
  103. abortactiontype=2
  104. abortactionaction=log.returnStatus = 'Abort'; log.returnRetry = 0; signal sendVoiceDone
  105. erroractiontype=2
  106. erroractionaction=log.returnStatus = 'Error'; log.returnRetry = 0; signal sendVoiceDone
  107. nextactiontype=0
  108. nextactionaction=sendVoiceConnected
  109. endrecord=true
  110. startrecord=true
  111. label=sendVoiceAgain
  112. nodetype=5
  113. mode=2
  114. nextactiontype=3
  115. nextactionaction=
  116. endrecord=true
  117. startrecord=true
  118. label=
  119. nodetype=16
  120. timeout=5
  121. abortactiontype=2
  122. abortactionaction=log.returnStatus = 'Abort'; log.returnRetry = 0; signal sendVoiceDone
  123. erroractiontype=2
  124. erroractionaction=log.returnStatus = 'Error'; log.returnRetry = 0; signal sendVoiceDone
  125. nextactiontype=2
  126. nextactionaction=
  127. endrecord=true
  128. startrecord=true
  129. label=sendVoiceRetry
  130. nodetype=8
  131. line1=numTries = numTries - 1
  132. line2=if numTries <= 0 then do
  133. line3=  log.returnStatus = 'Busy'
  134. line4=  signal sendVoiceDone
  135. line5=end
  136. line6=
  137. line7=
  138. line8=
  139. line9=
  140. line10=
  141. nextactiontype=0
  142. nextactionaction=sendVoiceRedial
  143. endrecord=true
  144. startrecord=true
  145. label=
  146. nodetype=8
  147. line1=numTimes = numTimes - 1
  148. line2=if numTimes <= 0 then do
  149. line3=  signal sendVoiceTimedOut
  150. line4=end
  151. line5=
  152. line6=
  153. line7=
  154. line8=
  155. line9=
  156. line10=
  157. nextactiontype=0
  158. nextactionaction=sendVoiceRepeat
  159. endrecord=true
  160. startrecord=true
  161. label=sendVoiceTimedOut
  162. nodetype=8
  163. line1=log.returnStatus = 'Sent-TimedOut'
  164. line2=log.returnRetry = 0
  165. line3=
  166. line4=
  167. line5=
  168. line6=
  169. line7=
  170. line8=
  171. line9=
  172. line10=
  173. nextactiontype=0
  174. nextactionaction=sendVoiceDone
  175. endrecord=true
  176. startrecord=true
  177. label=sendVoiceBusy
  178. nodetype=8
  179. line1=log.returnRetry = 0
  180. line2=log.returnStatus = 'Sent-Busy'
  181. line3=
  182. line4=
  183. line5=
  184. line6=
  185. line7=
  186. line8=
  187. line9=
  188. line10=
  189. nextactiontype=0
  190. nextactionaction=sendVoiceDone
  191. endrecord=true
  192. startrecord=true
  193. label=sendVoiceOK
  194. nodetype=8
  195. line1=log.returnRetry = 0
  196. line2=log.returnStatus = 'Sent+'
  197. line3=
  198. line4=
  199. line5=
  200. line6=
  201. line7=
  202. line8=
  203. line9=
  204. line10=
  205. nextactiontype=3
  206. nextactionaction=
  207. endrecord=true
  208. startrecord=true
  209. label=sendVoiceDone
  210. nodetype=8
  211. line1=if log.returnRetry > 0 then do
  212. line2=  log.returnRetry = log.returnRetry - 1
  213. line3=  log.time = cTime() + log.returnInterval * 60
  214. line4=end
  215. line5=
  216. line6=call updateLogEntry(mailbox, magicCookie)
  217. line7=
  218. line8=
  219. line9=
  220. line10=
  221. nextactiontype=2
  222. nextactionaction=exit
  223. endrecord=true
  224. startrecord=true
  225. label=
  226. nodetype=7
  227. filename=avm:rexx/simplestdtail.avm
  228. nextactiontype=3
  229. nextactionaction=
  230. endrecord=true
  231.